#例子1
library(pracma) #载入包，为使用行最简形函数rref
library(MASS) #载入包，为使用把小数化为分数的函数fractions
A=matrix(c(3,2,-5,4,3,-1,3,-3,3,5,-13,11),nrow=3,byrow=T)
fractions(rref(A))

#例子2
library(pracma) #每次打开R程序，都要载入。
A=matrix(c(2,1,-1,1,1,2,1,1,3,0,-3,1,1,1,0,1),nrow=4,byrow=T)
fractions(rref(A))

#例子3
library(pracma) 
A=matrix(c(1,3,-1,2,-1,2,1,0,5,2,-1,1,1,-6,-7,-2,1,-1,-5,3),nrow=4,byrow=T)
rref(A)

#习题
library(pracma) 
A=matrix(c(1,2,1,0, -1,1,1,1, 2,-1,0,1, 1,-1,3,7),nrow=4,byrow=F)
rref(A)

